home *** CD-ROM | disk | FTP | other *** search
/ Aminet 7 / Aminet 7 - August 1995.iso / Aminet / comm / term / ncomm30.lha / NComm / Scripts / testrx.ncomm < prev   
Text File  |  1993-03-06  |  682b  |  18 lines

  1. /* Test NComm result codes */
  2.  
  3. options results /* Turn on result codes */
  4.  
  5. address 'ncomm' /* Our port address */
  6.  
  7. config "ncomm:ncomm.config" /* This should work */
  8. if RC ~= 0 then simplereq "Could not load ncomm:ncomm.config"
  9.            else simplereq "Config file ncomm:ncomm.config loaded ok"
  10.  
  11. config "ncomm:foobar.config" /* This should fail */
  12. if RC ~= 0 then simplereq "Could not load ncomm:foobar.config"
  13.            else simplereq "Config file ncomm:foobar.config loaded ok"
  14.  
  15. stringreq "Enter a string" /* Open string requester */
  16. if RC ~= 0 then simplereq "You did not enter anything" /* Error */
  17.            else simplereq "You entered: "result /* Show result on screen */
  18.